home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
dev
/
m2
/
ModGen.lha
/
ModGen
/
Source
/
MGRequest.def
< prev
next >
Wrap
Text File
|
1995-04-17
|
1KB
|
36 lines
(*---------------------------------------------------------------------------
:Program. MGRequest.def
:Contents. Oberfläche für ModGen
:Author. Frank Lömker
:Copyright. FreeWare
:Language. Modula-2
:Translator. Turbo Modula-2 V1.40
:Imports. NoFragLib [Jan van den Baard]
:Imports. MGTools [Frank]
:History. 1.0 [Frank] 17-Apr-95
:History. ModGen basiert direkt auf OG V37.11 von Thomas Igracki
:History. und GenOberon V1.0 von Kai Bolay und Jan van den Baard.
:Bugs. keine bekannt
---------------------------------------------------------------------------*)
DEFINITION MODULE MGRequest;
FROM SYSTEM IMPORT ADDRESS;
FROM Dos IMPORT FileHandlePtr;
FROM NoFragLib IMPORT MemoryChainPtr;
FROM MGTools IMPORT Pstr256;
VAR geladen:BOOLEAN;
chain: MemoryChainPtr;
ValidBits: LONGINT;
PROCEDURE Request (text,data:ADDRESS);
(* Open a file carefully. *)
PROCEDURE OpenSafe (name: ARRAY OF CHAR): FileHandlePtr;
PROCEDURE startSave (start:BOOLEAN);
PROCEDURE saveicon (name:ARRAY OF CHAR);
PROCEDURE OpenReq (VAR start,end:INTEGER):BOOLEAN;
PROCEDURE InitReq;
END MGRequest.